﻿Public Class ResultadoTestEntity
    Inherits EntityBase

    Public Sub New()
    End Sub

    Public Sub New(ByVal descripcion As String, ByVal test As TestEntity, ByVal checked As Boolean, ByVal warnings As String, ByVal errores As String, ByVal fecha As DateTime, ByVal estado As EstadoEntity)
        _descripcion = descripcion
        _test = test
        _checked = checked
        _warnings = warnings
        _errores = errores
        _fecha = fecha
        _estado = estado
    End Sub

    Private _descripcion As String
    Public Property Descripcion() As String
        Get
            Return _descripcion
        End Get
        Set(ByVal value As String)
            _descripcion = value
        End Set
    End Property

    Private _test As TestEntity
    Public Property Test() As TestEntity
        Get
            Return _test
        End Get
        Set(ByVal value As TestEntity)
            _test = value
        End Set
    End Property

    Private _checked As Boolean
    Public Property Checked() As Boolean
        Get
            Return _checked
        End Get
        Set(ByVal value As Boolean)
            _checked = value
        End Set
    End Property

    Private _warnings As String
    Public Property Warnings() As String
        Get
            Return _warnings
        End Get
        Set(ByVal value As String)
            _warnings = value
        End Set
    End Property

    Private _errores As String
    Public Property Errores() As String
        Get
            Return _errores
        End Get
        Set(ByVal value As String)
            _errores = value
        End Set
    End Property

    Private _fecha As DateTime
    Public Property Fecha() As DateTime
        Get
            Return _fecha
        End Get
        Set(ByVal value As DateTime)
            _fecha = value
        End Set
    End Property

    Private _estado As EstadoEntity
    Public Property Estado() As EstadoEntity
        Get
            Return _estado
        End Get
        Set(ByVal value As EstadoEntity)
            _estado = value
        End Set
    End Property

    Public Overrides Function ToString() As String
        Return Me.Id + Me.Test.CasoDeUso.Titulo
    End Function
End Class
